home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 9 / AMUG BBS in a Box Volume IX (August 1993) (MacWizards).iso / Files / Prog / S / SimpleTools2.cpt / SimpleTools2 / LittleDemo.c next >
MacBinary  |  1987-03-28  |  2.6 KB  |  [TEXT/KAHL]
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: LittleDemo.c

ConfidenceProgramDetectionMatch TypeSupport
66% dexvert Compact Compressed (Unix) (archive/compact) ext Supported
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Sat Mar 28 13:08:30 1987, modified Sat Mar 28 13:08:30 1987, creator Think C, type ASCII, 2137 bytes "LittleDemo.c" , at 0x8d9 348 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[KAHL]


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 4c 69 74 74 6c 65 | 44 65 6d 6f 2e 63 00 00 |..Little|Demo.c..|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 01 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 08 59 00 | 00 01 5c 9c 91 c2 1e 9c |......Y.|..\.....|
|00000060| 91 c2 1e 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 8d be 00 00 |........|........|
|00000080| 0d 2f 2a 20 20 54 68 69 | 73 20 69 73 20 61 20 76 |./*  Thi|s is a v|
|00000090| 65 72 79 20 73 69 6d 70 | 6c 65 20 64 65 6d 6f 6e |ery simp|le demon|
|000000a0| 73 74 72 61 74 69 6f 6e | 20 6f 66 20 61 20 63 6f |stration| of a co|
|000000b0| 6d 70 6c 65 74 65 20 61 | 70 70 6c 69 63 61 74 69 |mplete a|pplicati|
|000000c0| 6f 6e 0d 20 20 20 20 75 | 73 69 6e 67 20 53 69 6d |on.    u|sing Sim|
|000000d0| 70 6c 65 54 6f 6f 6c 73 | 2e 0d 20 20 20 20 0d 20 |pleTools|..    . |
|000000e0| 20 20 20 4c 69 6e 6b 20 | 74 68 69 73 20 66 69 6c |   Link |this fil|
|000000f0| 65 20 77 69 74 68 20 53 | 69 6d 70 6c 65 54 6f 6f |e with S|impleToo|
|00000100| 6c 73 2e 6f 0d 20 20 20 | 20 28 53 69 6d 70 6c 65 |ls.o.   | (Simple|
|00000110| 54 6f 6f 6c 73 2e 6f 20 | 69 73 20 63 72 65 61 74 |Tools.o |is creat|
|00000120| 65 64 20 62 79 20 63 6f | 6d 70 69 6c 69 6e 67 20 |ed by co|mpiling |
|00000130| 53 69 6d 70 6c 65 54 6f | 6f 6c 73 2e 63 29 0d 20 |SimpleTo|ols.c). |
|00000140| 2a 2f 0d 20 0d 23 69 6e | 63 6c 75 64 65 20 22 73 |*/. .#in|clude "s|
|00000150| 69 6d 70 6c 65 2e 68 22 | 09 09 2f 2a 20 53 69 6d |imple.h"|../* Sim|
|00000160| 70 6c 65 54 6f 6f 6c 73 | 20 68 65 61 64 65 72 20 |pleTools| header |
|00000170| 66 69 6c 65 09 2a 2f 0d | 0d 23 69 66 64 65 66 20 |file.*/.|.#ifdef |
|00000180| 4d 45 47 41 4d 41 58 0d | 20 20 23 69 6e 63 6c 75 |MEGAMAX.|  #inclu|
|00000190| 64 65 20 3c 71 64 2e 68 | 3e 09 09 2f 2a 20 51 75 |de <qd.h|>../* Qu|
|000001a0| 69 63 6b 64 72 61 77 20 | 68 65 61 64 65 72 20 66 |ickdraw |header f|
|000001b0| 69 6c 65 09 2a 2f 0d 23 | 65 6e 64 69 66 0d 0d 23 |ile.*/.#|endif..#|
|000001c0| 69 66 64 65 66 20 4c 49 | 47 48 54 53 50 45 45 44 |ifdef LI|GHTSPEED|
|000001d0| 0d 20 20 23 69 6e 63 6c | 75 64 65 20 3c 51 75 69 |.  #incl|ude <Qui|
|000001e0| 63 6b 64 72 61 77 2e 68 | 3e 0d 23 65 6e 64 69 66 |ckdraw.h|>.#endif|
|000001f0| 0d 0d 67 6f 74 62 65 65 | 70 20 28 29 09 09 09 2f |..gotbee|p ().../|
|00000200| 2a 20 74 6f 20 62 65 20 | 65 78 65 63 75 74 65 64 |* to be |executed|
|00000210| 20 77 68 65 6e 20 62 65 | 65 70 20 69 73 20 70 69 | when be|ep is pi|
|00000220| 63 6b 65 64 20 2a 2f 0d | 7b 0d 20 20 53 79 73 42 |cked */.|{.  SysB|
|00000230| 65 65 70 20 28 31 30 29 | 3b 0d 7d 0d 0d 69 6e 77 |eep (10)|;.}..inw|
|00000240| 69 6e 64 6f 77 20 28 78 | 2c 20 79 29 09 09 09 2f |indow (x|, y).../|
|00000250| 2a 20 65 78 65 63 75 74 | 65 64 20 77 68 65 6e 20 |* execut|ed when |
|00000260| 63 6c 69 63 6b 20 69 6e | 20 6f 75 72 20 77 69 6e |click in| our win|
|00000270| 64 6f 77 20 2a 2f 0d 69 | 6e 74 20 78 2c 20 79 3b |dow */.i|nt x, y;|
|00000280| 0d 7b 0d 20 20 50 6f 69 | 6e 74 20 6d 2c 20 6c 6d |.{.  Poi|nt m, lm|
|00000290| 3b 0d 20 20 4d 6f 76 65 | 54 6f 20 28 78 2c 20 79 |;.  Move|To (x, y|
|000002a0| 29 3b 09 09 2f 2a 20 64 | 72 61 77 20 61 20 50 6f |);../* d|raw a Po|
|000002b0| 69 6e 74 20 77 68 65 72 | 65 20 74 68 65 20 6d 6f |int wher|e the mo|
|000002c0| 75 73 65 20 69 73 20 2a | 2f 0d 20 20 4c 69 6e 65 |use is *|/.  Line|
|000002d0| 54 6f 20 28 78 2c 20 79 | 29 3b 0d 20 20 23 69 66 |To (x, y|);.  #if|
|000002e0| 64 65 66 20 4d 45 47 41 | 4d 41 58 0d 20 20 20 20 |def MEGA|MAX.    |
|000002f0| 6c 6d 2e 61 2e 68 20 3d | 20 78 3b 20 6c 6d 2e 61 |lm.a.h =| x; lm.a|
|00000300| 2e 76 20 3d 20 79 3b 0d | 20 20 20 20 77 68 69 6c |.v = y;.|    whil|
|00000310| 65 20 28 53 74 69 6c 6c | 44 6f 77 6e 28 29 29 20 |e (Still|Down()) |
|00000320| 7b 09 2f 2a 20 61 6e 64 | 20 6b 65 65 70 20 64 72 |{./* and| keep dr|
|00000330| 61 77 69 6e 67 20 6c 69 | 6b 65 20 61 20 70 65 6e |awing li|ke a pen|
|00000340| 63 69 6c 20 20 2a 2f 0d | 20 20 20 20 20 20 47 65 |cil  */.|      Ge|
|00000350| 74 4d 6f 75 73 65 20 28 | 26 6d 29 3b 09 09 2f 2a |tMouse (|&m);../*|
|00000360| 20 62 75 74 20 6f 6e 6c | 79 20 77 68 65 6e 20 74 | but onl|y when t|
|00000370| 68 65 20 6d 6f 75 73 65 | 20 6d 6f 76 65 73 20 20 |he mouse| moves  |
|00000380| 20 2a 2f 0d 20 20 20 20 | 20 20 69 66 20 28 28 6d | */.    |  if ((m|
|00000390| 2e 61 2e 68 20 21 3d 20 | 6c 6d 2e 61 2e 68 29 20 |.a.h != |lm.a.h) |
|000003a0| 7c 7c 20 28 6d 2e 61 2e | 76 20 21 3d 20 6c 6d 2e ||| (m.a.|v != lm.|
|000003b0| 61 2e 76 29 29 20 7b 0d | 20 20 20 20 20 20 20 20 |a.v)) {.|        |
|000003c0| 4c 69 6e 65 54 6f 20 28 | 6d 2e 61 2e 68 2c 20 6d |LineTo (|m.a.h, m|
|000003d0| 2e 61 2e 76 29 3b 0d 20 | 20 20 20 20 20 20 20 6c |.a.v);. |       l|
|000003e0| 6d 20 3d 20 6d 3b 0d 20 | 20 20 20 20 20 7d 0d 20 |m = m;. |     }. |
|000003f0| 20 20 20 7d 0d 20 20 23 | 65 6c 73 65 0d 20 20 20 |   }.  #|else.   |
|00000400| 20 6c 6d 2e 68 20 3d 20 | 78 3b 20 6c 6d 2e 76 20 | lm.h = |x; lm.v |
|00000410| 3d 20 79 3b 0d 20 20 20 | 20 77 68 69 6c 65 20 28 |= y;.   | while (|
|00000420| 53 74 69 6c 6c 44 6f 77 | 6e 28 29 29 20 7b 09 2f |StillDow|n()) {./|
|00000430| 2a 20 61 6e 64 20 6b 65 | 65 70 20 64 72 61 77 69 |* and ke|ep drawi|
|00000440| 6e 67 20 6c 69 6b 65 20 | 61 20 70 65 6e 63 69 6c |ng like |a pencil|
|00000450| 20 20 2a 2f 0d 20 20 20 | 20 20 20 47 65 74 4d 6f |  */.   |   GetMo|
|00000460| 75 73 65 20 28 26 6d 29 | 3b 09 09 2f 2a 20 62 75 |use (&m)|;../* bu|
|00000470| 74 20 6f 6e 6c 79 20 77 | 68 65 6e 20 74 68 65 20 |t only w|hen the |
|00000480| 6d 6f 75 73 65 20 6d 6f | 76 65 73 20 20 20 2a 2f |mouse mo|ves   */|
|00000490| 0d 20 20 20 20 20 20 69 | 66 20 28 28 6d 2e 68 20 |.      i|f ((m.h |
|000004a0| 21 3d 20 6c 6d 2e 68 29 | 20 7c 7c 20 28 6d 2e 76 |!= lm.h)| || (m.v|
|000004b0| 20 21 3d 20 6c 6d 2e 76 | 29 29 20 7b 0d 20 20 20 | != lm.v|)) {.   |
|000004c0| 20 20 20 20 20 4c 69 6e | 65 54 6f 20 28 6d 2e 68 |     Lin|eTo (m.h|
|000004d0| 2c 20 6d 2e 76 29 3b 0d | 20 20 20 20 20 20 20 20 |, m.v);.|        |
|000004e0| 6c 6d 20 3d 20 6d 3b 0d | 20 20 20 20 20 20 7d 0d |lm = m;.|      }.|
|000004f0| 20 20 20 20 7d 0d 20 20 | 23 65 6e 64 69 66 0d 7d |    }.  |#endif.}|
|00000500| 0d 0d 72 65 64 72 61 77 | 20 28 29 09 09 09 2f 2a |..redraw| ().../*|
|00000510| 20 74 6f 20 72 65 64 72 | 61 77 20 6f 75 72 20 77 | to redr|aw our w|
|00000520| 69 6e 64 6f 77 20 2a 2f | 0d 7b 0d 20 20 4d 6f 76 |indow */|.{.  Mov|
|00000530| 65 54 6f 20 28 35 30 2c | 20 35 30 29 3b 09 09 2f |eTo (50,| 50);../|
|00000540| 2a 20 64 72 61 77 20 61 | 20 62 6f 78 20 74 68 65 |* draw a| box the|
|00000550| 20 68 61 72 64 20 77 61 | 79 20 2a 2f 0d 20 20 4c | hard wa|y */.  L|
|00000560| 69 6e 65 54 6f 20 28 35 | 30 2c 20 31 30 30 29 3b |ineTo (5|0, 100);|
|00000570| 0d 20 20 4c 69 6e 65 54 | 6f 20 28 31 30 30 2c 20 |.  LineT|o (100, |
|00000580| 31 30 30 29 3b 0d 20 20 | 4c 69 6e 65 54 6f 20 28 |100);.  |LineTo (|
|00000590| 31 30 30 2c 20 35 30 29 | 3b 0d 20 20 4c 69 6e 65 |100, 50)|;.  Line|
|000005a0| 54 6f 20 28 35 30 2c 20 | 35 30 29 3b 0d 7d 0d 0d |To (50, |50);.}..|
|000005b0| 6e 6f 5f 65 64 69 74 20 | 28 29 09 09 09 2f 2a 20 |no_edit |().../* |
|000005c0| 74 75 72 6e 20 6f 66 66 | 20 65 64 69 74 20 6d 65 |turn off| edit me|
|000005d0| 6e 75 20 28 6f 6e 20 61 | 63 74 69 76 61 74 69 6f |nu (on a|ctivatio|
|000005e0| 6e 29 20 2a 2f 0d 7b 0d | 20 20 6d 65 6e 75 20 28 |n) */.{.|  menu (|
|000005f0| 22 45 64 69 74 22 2c 20 | 22 22 2c 20 69 74 65 6d |"Edit", |"", item|
|00000600| 64 69 73 61 62 6c 65 29 | 3b 0d 7d 0d 0d 79 65 73 |disable)|;.}..yes|
|00000610| 5f 65 64 69 74 20 28 29 | 09 09 09 2f 2a 20 74 75 |_edit ()|.../* tu|
|00000620| 72 6e 20 6f 6e 20 65 64 | 69 74 20 6d 65 6e 75 20 |rn on ed|it menu |
|00000630| 28 6f 6e 20 64 65 61 63 | 74 69 76 61 74 69 6f 6e |(on deac|tivation|
|00000640| 29 20 2a 2f 0d 7b 0d 20 | 20 6d 65 6e 75 20 28 22 |) */.{. | menu ("|
|00000650| 45 64 69 74 22 2c 20 22 | 22 2c 20 69 74 65 6d 65 |Edit", "|", iteme|
|00000660| 6e 61 62 6c 65 29 3b 0d | 7d 0d 0d 61 62 6f 75 74 |nable);.|}..about|
|00000670| 6d 65 28 29 09 09 09 2f | 2a 20 41 62 6f 75 74 20 |me().../|* About |
|00000680| 6d 65 73 73 61 67 65 20 | 2a 2f 0d 7b 0d 20 20 6d |message |*/.{.  m|
|00000690| 65 73 73 61 67 65 20 28 | 22 4c 69 74 74 6c 65 44 |essage (|"LittleD|
|000006a0| 65 6d 6f 5c 72 53 69 6d | 70 6c 65 54 6f 6f 6c 73 |emo\rSim|pleTools|
|000006b0| 20 64 65 6d 6f 6e 73 74 | 72 61 74 69 6f 6e 5c 72 | demonst|ration\r|
|000006c0| 42 79 20 45 72 69 6b 20 | 4b 69 6c 6b 22 29 3b 0d |By Erik |Kilk");.|
|000006d0| 7d 0d 0d 73 65 74 75 70 | 20 28 29 09 09 09 2f 2a |}..setup| ().../*|
|000006e0| 20 53 65 74 75 70 20 74 | 68 65 20 6d 65 6e 75 73 | Setup t|he menus|
|000006f0| 20 61 6e 64 20 77 69 6e | 64 6f 77 73 20 2a 2f 0d | and win|dows */.|
|00000700| 7b 0d 20 20 6d 65 6e 75 | 20 28 61 70 70 6c 65 73 |{.  menu| (apples|
|00000710| 74 72 69 6e 67 2c 20 22 | 41 62 6f 75 74 20 4c 69 |tring, "|About Li|
|00000720| 74 74 6c 65 44 65 6d 6f | 2e 2e 2e 22 2c 20 61 62 |ttleDemo|...", ab|
|00000730| 6f 75 74 6d 65 29 3b 0d | 20 20 09 09 09 09 2f 2a |outme);.|  ..../*|
|00000740| 20 44 65 66 61 75 6c 74 | 20 41 62 6f 75 74 20 69 | Default| About i|
|00000750| 73 20 64 69 73 61 62 6c | 65 64 20 2a 2f 0d 20 20 |s disabl|ed */.  |
|00000760| 6d 65 6e 75 20 28 61 70 | 70 6c 65 73 74 72 69 6e |menu (ap|plestrin|
|00000770| 67 2c 20 22 41 62 6f 75 | 74 20 4c 69 74 74 6c 65 |g, "Abou|t Little|
|00000780| 44 65 6d 6f 2e 2e 2e 22 | 2c 20 69 74 65 6d 65 6e |Demo..."|, itemen|
|00000790| 61 62 6c 65 29 3b 0d 20 | 20 6d 65 6e 75 20 28 22 |able);. | menu ("|
|000007a0| 46 69 6c 65 22 2c 20 22 | 42 65 65 70 22 2c 20 67 |File", "|Beep", g|
|000007b0| 6f 74 62 65 65 70 29 3b | 0d 20 20 73 69 6d 70 6c |otbeep);|.  simpl|
|000007c0| 65 71 75 69 74 73 20 28 | 29 3b 0d 20 20 77 69 6e |equits (|);.  win|
|000007d0| 64 6f 77 20 28 22 4c 69 | 74 74 6c 65 44 65 6d 6f |dow ("Li|ttleDemo|
|000007e0| 22 2c 20 32 30 2c 20 35 | 30 2c 20 34 39 30 2c 20 |", 20, 5|0, 490, |
|000007f0| 33 32 35 2c 20 0d 20 20 | 09 6e 6f 5f 65 64 69 74 |325, .  |.no_edit|
|00000800| 2c 20 79 65 73 5f 65 64 | 69 74 2c 20 72 65 64 72 |, yes_ed|it, redr|
|00000810| 61 77 2c 20 69 6e 77 69 | 6e 64 6f 77 29 3b 0d 7d |aw, inwi|ndow);.}|
|00000820| 0d 0d 6d 61 69 6e 20 28 | 29 0d 7b 0d 20 20 73 69 |..main (|).{.  si|
|00000830| 6d 70 6c 65 74 6f 6f 6c | 73 20 28 22 41 62 6f 75 |mpletool|s ("Abou|
|00000840| 74 20 4c 69 74 74 6c 65 | 44 65 6d 6f 2e 2e 2e 22 |t Little|Demo..."|
|00000850| 29 3b 09 2f 2a 20 49 6e | 69 74 69 61 6c 69 7a 65 |);./* In|itialize|
|00000860| 20 53 69 6d 70 6c 65 54 | 6f 6f 6c 73 09 2a 2f 0d | SimpleT|ools.*/.|
|00000870| 20 20 73 65 74 75 70 20 | 28 29 3b 09 09 09 09 2f |  setup |();..../|
|00000880| 2a 20 49 6e 73 74 61 6c | 6c 20 6f 75 72 20 6d 65 |* Instal|l our me|
|00000890| 6e 75 73 20 61 6e 64 20 | 77 69 6e 64 6f 77 20 2a |nus and |window *|
|000008a0| 2f 0d 20 20 66 6f 72 20 | 28 3b 3b 29 20 73 69 6d |/.  for |(;;) sim|
|000008b0| 70 6c 65 65 76 65 6e 74 | 73 20 28 29 3b 09 09 2f |pleevent|s ();../|
|000008c0| 2a 20 48 61 6e 64 6c 65 | 20 61 6c 6c 20 65 76 65 |* Handle| all eve|
|000008d0| 6e 74 73 09 09 2a 2f 0d | 7d 00 00 00 00 00 00 00 |nts..*/.|}.......|
|000008e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000900| 00 00 01 00 00 00 01 16 | 00 00 00 16 00 00 00 46 |........|.......F|
|00000910| 6c 6c 6f 63 28 29 3b 0d | 0d 23 65 6e 64 69 66 24 |lloc();.|.#endif$|
|00000920| 6b 1e 24 2a 00 1c e0 8a | e2 8a 86 c2 b6 6a 00 1a |k.$*....|.....j..|
|00000930| 1a 31 2e 20 44 44 45 78 | 70 61 6e 64 45 78 70 61 |.1. DDEx|pandExpa|
|00000940| 6e 64 54 65 6d 70 46 69 | 6c 65 20 78 02 00 00 00 |ndTempFi|le x....|
|00000950| 00 00 44 44 54 4d 44 44 | 41 50 01 00 00 00 00 00 |..DDTMDD|AP......|
|00000960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000970| 00 00 a5 f4 97 f5 00 00 | 08 59 00 00 01 5c 20 41 |........|.Y...\ A|
|00000980| a0 24 4e 75 00 00 00 00 | 00 00 0b 7c 90 00 00 00 |.$Nu....|...|....|
|00000990| 00 d8 00 0e 00 00 ff f4 | 00 0e 00 0f 04 dc 00 0c |........|........|
|000009a0| 00 03 00 01 00 44 00 00 | 00 00 00 00 00 00 00 00 |.....D..|........|
|000009b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009e0| 00 00 00 00 00 00 00 00 | 00 00 0c 00 4c 80 00 00 |........|....L...|
|000009f0| 00 00 03 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a00| 00 00 00 04 00 06 00 08 | 00 00 00 0a 00 09 06 4d |........|.......M|
|00000a10| 6f 6e 61 63 6f 0e 00 00 | 01 00 00 00 01 16 00 00 |onaco...|........|
|00000a20| 00 16 00 00 00 46 00 03 | 27 cc 02 f2 00 00 00 1c |.....F..|'.......|
|00000a30| 00 46 00 01 45 54 41 42 | 00 00 00 12 45 46 4e 54 |.F..ETAB|....EFNT|
|00000a40| 00 00 00 1e 03 ec ff ff | 00 00 00 00 00 03 26 fc |........|......&.|
|00000a50| 03 eb ff ff 00 00 00 08 | 00 03 26 f8 00 00 00 00 |........|..&.....|
|00000a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+